Top 10k strings from Profesor Dietetico (19xx)(Luis Antonio Menendez)(es).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
12 ;" Kilos"; 7 K$="ROBUSTA" 7 K$="MEDIANA" 7 K$="LIGERA" 3 PULSE UNA TECLA PARA CONTINUAR 3 INSUFICIENTE 3 SUFICIENTE 3 CORRECTO 2 fi<(pe/4.5 2 TT=TT+A(C) 2 ORIENTACIONES 2 LISTADO DE ALIMENTOS 2 CR=CR+A(C) 2 BROMATOLOGIA 2 ASPECTOS DIETETICOS 2 AM=A(C)*100 2 A$(C,V)=" " 2 ;"QUIERE VOLVER AL LISTADO ? (S/N)" 2 ;"PULSE LA INICIAL CORRESPONDIENTE" 2 ;"INTRODUZCA SU TALLA EN "; 2 "0","0","0","0","0","0","0","0","0","0","0" 2 - CREAR UN REGIMEN"; 2 - CALCULAR SU PESO"; 2 - ANALISIS DE ALIMENTOS"; 2 EXCESIVO 2 * MENU PRINCIPAL * 2 1 |`@_,Gg,G,Cd 1 p$(Q(z))*(x(z)/100 1 n+E;" ";a$(n+E) 1 l=E(ta-144 1 kgg,s,wg,s,wg,c,gg,d|C 1 j$="PRODUCTOS LACTEOS" 1 j$="PESCADOS" 1 j$="LEGUMBRES" 1 j$="HUEVOS" 1 j$="HORTALIZAS" 1 j$="GRASAS Y ACEITES" 1 j$="FRUTOS SECOS" 1 j$="FRUTAS" 1 j$="EMBUTIDOS" 1 j$="CEREALES Y DERIVADOS" 1 j$="CARNES " 1 j$="AZUCARES" 1 h=n(ta-144 1 h$(Q(z))*(x(z)/100 1 g$(Q(z))*(x(z)/100 1 fln=fln+lns 1 f=y(ta-144 1 f$(Q(z))*(x(z)/100 1 c$(Q(z))*(x(z)/100 1 Variable not foun 1 V;"INTRODUCE NUEVO CONCEPTO "; 1 V;"INTRODUCE NUEVA FECHA "; 1 V;"INTRODUCE NUEVA CATEGORIA "; 1 V;"INTRODUCE NUEVA CANTIDAD ";A(C): 1 Tape loading erro 1 TT=TT-A(C) 1 TT=TT+A(N) 1 Subscript wron 1 Statement los 1 STOP statemen 1 STOP in INPU 1 S=I(ta-154 1 RETURN without GOSU 1 RAMTOP no goo 1 Parameter erro 1 PROFESOR DIETETICO0 1 Out of scree 1 Out of memor 1 Out of DAT 1 OBJETIVO DEL REGIMEN 1 Number too bi 1 Nonsense in BASI 1 No room for lin 1 NO SALUDABLE 1 NEXT without FO 1 N. ALIMENTO CANTIDAD 1 MUY CALORICO 1 LIMOHIGOFRESCIRUBANAPINAMARGMANTACEIACEIMANT----------------------------------------------------------------------------------------2'7 2'3 1'5 2 3'4 4'7 4'3 3' 1 Invalid strea 1 Invalid file nam 1 Invalid colou 1 Invalid argumen 1 Invalid I/O devic 1 Integer out of rang 1 INTRODUCIR MAS ALIMENTOS 1 HOME 1988 1 G=B(ta-154 1 FOR without NEX 1 FN without DE 1 End of fil 1 En ningun caso hay quereducir el aporte calorico pri- vando al organismo de las canti-dades necesarias de algun nu- triente basico 1 CR=CR-A(C) 1 CR=CR+A(N) 1 COMIDA JUEGOS PAPEL.Y ESTANCO FARMACIA COCHE CAPRICHOS OTROS VARIOS INGRESOS 1 COMENZAR DE NUEVO 1 CARGANDO MATRIZ 1 BROMATOLOGb 1 BREAK into progra 1 BREAK - CONT repeat 1 ANALISIS DEL ALIMENTO NUM. 1 A=U(ta-154 1 A$(N,V)="8" 1 A$(C,V)="8" 1 A$(C,V))-V; 1 ;ta;" centimetros" 1 ;n+E;" ";a$(n+E) 1 ;l;" Kilos"; 1 ;h;" Kilos"; 1 ;f;" Kilos"; 1 ;S;" Kilos"; 1 ;Q(z);" ";a$(Q(z)); 1 ;G;" Kilos"; 1 ;A;" Kilos"; 1 ;''"FECHA CONCEPTO CANTIDAD ": 1 ;'" ESTAS SEGURO? " 1 ;"VA A CONSUMIR ? (en gramos)" 1 ;"USTED ES : 1 ;"TOTAL:- "; 1 ;"TALLA :"; 1 ;"SU PESO NORMAL :"; 1 ;"SU PESO IDEAL : " 1 ;"SU CONSTITUCION ES : 1 ;"SOBRE ESTE INTERESANTE CAMPO "; 1 ;"SEXO :"; 1 ;"QUIERE INTRODUCIR ALGUN"; 1 ;"QUE ESTUDIA LOS ALIMENTOS."; 1 ;"QUE CANTIDAD DE ";a$(al) 1 ;"PULSE UNA TECLA PARA COMENZAR" 1 ;"PULSE EL NUMERO DE LA OPCION " 1 ;"PROTEINAS...........";pr; 1 ;"PROTEINAS : ";p$(W);" GRAMOS" 1 ;"LA BROMATOLOGIA ES LA CIENCIA"; 1 ;"HIDRATOS DE CARBONO.";hi; 1 ;"HIDR. DE CARBONO : ";h$(W);" GRAMOS" 1 ;"GRUPO : ";j$ 1 ;"GRASAS..............";gr; 1 ;"GRASAS : ";g$(W);" GRAMOS" 1 ;"FIBRAS..............";fi; 1 ;"FIBRAS : ";f$(W);" GRAMOS" 1 ;"FECHA CONCEPTO CANTIDAD CAT" 1 ;"ESTE ESTUDIO SE DIRIGE TANTO"; 1 ;"EN PROTEINAS....." 1 ;"EN H. CARBONO...." 1 ;"EN GRASAS........" 1 ;"EN GENERAL......." 1 ;"EN FIBRAS........" 1 ;"EN CALORIAS......" 1 ;"EL PROGRAMA VERSA,EN PARTE,"; 1 ;"EDAD :"; 1 ;"DE LOS MISMOS." 1 ;"DE LA BIOQUIMICA." 1 ;"CONTENIDO :" 1 ;"CONSUMO MAXIMO : ";ca;" cal./dia" 1 ;"CONSTITUCION :"; 1 ;"CENTIMETROS (155-195)": 1 ;"CENTIMETROS (145-185)": 1 ;"CALORIAS............"; 1 ;"CALORIAS : ";c$(W);" CALORIAS" 1 ;"BALANCE:- "; 1 ;"ANALISIS DE 100 GRAMOS" 1 ;"ALIMENTO MAS ? (S/N)" 1 ;"ALIMENTO : ";a$(W) 1 ;"A LAS PROPIEDADES NUTRITIVAS"; 1 ;"A LA COMPOSICION QUIMICA COMO"; 1 ;"-------": 1 ;"* Por cada 7.73 calorias de de- ficit se adelgazara un gramo.Di-cho en otros terminos , un defi-cit calorico de 1000 calorias diarias supone perder unos 130 gramos al dia , es decir , casi un kilo a la semana." 1 ;"* Hay que repartir los alimentosentre 3 y 5 comidas diarias." 1 ;"* En primer lugar,una dieta de adelgazamiento ha de ser hipoca-lorica,es decir ha de aportar menos calorias de las que consu-me el individuo en cuestion,paraobligar a quemar las reservas degrasa." 1 ;"* El consumo calorico normal va-ria para cada individuo ,segun la edad ,el sexo y la actividad fisica.Un hombre adulto normal que desarrolle una actividad fi-sica ligera , consume de 2500 a 3000 calorias diarias ,en la mu-jer unas 2200 calorias.Para am- bos sexos,el consumo aumenta al acrecentarse el grado de acti- vidad." 1 ;" SELECCIONA CATEGORIA(1-8) " 1 ;" NUMERO ";C,C$( 1 ;" 7:- SALIR DEL PROGRAMA " 1 ;" 6:- CAMBIAR DATOS "; 1 ;" 5:- IMPRESORA "; 1 ;" 4:- CARGAR DESDE CINTA "; 1 ;" 3:- ALMACENAR EN CINTA "; 1 ;" 2:- VISUALIZAR DATOS "; 1 ;" 1:- INTRODUCIR DATOS "; 1 ;" - SELECCIONA OPCION. - " 1 ;" ";n+E;" ";a$(n+E): 1 ;" ";Q(z);" ";a$(Q(z)); 1 ;" ";N;":- ";C$(N): 1 ;" M E N U " 1 89.390.291.292.265.165.766.366.967.568.168.869.570.270.971.672.172.973.774.675.576,377.478.379.179.980.681.582.383.184.085.086.087.088.089.090.090.891.692.693,694.695.496.497.498.346.246.747.247.748.248.749.249.750.350.951.552.052.553.153.754.354.955.656.256.857.558.258.959.660.360.961.762.563.364.165.065.866.7 1 74.475.276.177.077.978.779.580.280.981.682.1LECHLECHQUESQUESQUESREQUYOGUYOGUCARNCARNCERDJAMOJAMOHIGACHORSALCS. FPOLLPESCPESCMARIHUEVALMEAVELCACANUEZGARBGUISJUDILENTSOJATRIGHARIPAN PAN SEMOMAIZPAN COPOARROPASTSPAGPASAMIELCHOCAZUCAZUCPATAZANATOMALECHJUDIESPIESPACOLICEBOCALAALCAAJO ACELUVA SANDPERANARAMELOMELOMANZ 1 67.568.369.169.870.571.271.849.550.050.551.051.552.052.553.153.754.354.955.456.056.757.357.958.659.360.060.661.362.263.163.864.665.466.267.067.868.669.470.270.971.772.573.374.174.775.476.176.754.655.055.556.056.557.157.658.258.859.460.060.561.161.762.362.963.564.265.065.866.667.468.168.969.770.571.372.072.873.6 1 56.5 57.0 57.6 57.2 58.8 59.4 60.0 60.6 61.2 61.8 62.4 63.0 63.7 64.4 65.2 66.0 66.8 67.6 68.4 69.2 70.0 70.7 71.6 72.5 73.4 74.1 75.0 75.8 76.5 77.3 78.1 78.9 79.7 80.6 81.4 82.2 83.0 83.8 84.6 85.4 86.3 60.4 60.9 61.4 62.0 62.5 63.1 63.8 64.5 65.2 65.7 66.3 66.9 67.6 68.4 69.2 70.1 70.8 71.7 72.6 73.4 74.1 74.9 75.8 76.6 77.5 78.4 79.3 80 1 0'61'61'30'40'40'4---------------5'64'53'42'91'84 4'54'5------------------------------------2 2'719'19'18'13'61'61 60'60'35'72 76 57 61 76 74 53 67 80 73 75 17'78 57 99 90 18'8'94'62'96'64'94'46'59'75'55'929'5'616'5'314'10'11'13'15' 1 ,k,og,k,lC 1 ,U;"NOMBRE DEL FICHERO A CARGAR?": 1 ,U;"INSERTA CASSETTE Y PULSA PLAY " 1 ,U;" A - ADELANTAR Q - RETROCEDER EDIT PARA CAMBIAR REGISTRO " 1 ,U;" VOLCADO DE IMPRESORA S/N? " 1 ,U;" NOMBRE DEL FICHERO? ": 1 ,O,Kg,O,Kd 1 +"W\#"S\"K\6 1 '7 2'3 0'3 5'1 0'5 ----1'8 5'9 3'5 0'6 0'5 0'3 0'5 0'1 0'5 ----0'1 2 2'9 1'5 0'7 1'2 0'7 1'2 1 1'3 0'4 2'2 1'1 1 0'5 0'2 1'9 0'4 0'4 0'9 0'7 1 '#P;" TOTAL DE GASTOS:- "; 1 '"PULSA UNA TECLA PARA SEGUIR" 1 #"a\*a\"c\*c\"e\ 1 #"a\"c\"e\>82 1 "Una vez determinado el consumo diario normal se trata de esta- blecer una dieta que este por debajo de ese consumo , ya que este deficit calorico se traduceen adelgazamiento , al verse o- bligado el organismo a quemar sus reservas de grasa." 1 "TODO CORRECTO ? (S/N) ";x$ 1 "QUIERE VER REGIMEN ? (S/N)";i$ 1 "PULSE 'ENTER' PARA SEGUIR ";T$ 1 "NARANJA","MELON","MELOCOTON","MANZANA","LIMON","HIGO","FRESA","CIRUELA","BANANA","PINA" 1 "MIEL","CHOCOLATE","AZUCAR REFINADO","AZUCAR MORENO","PATATA","ZANAHORIA","TOMATE","LECHUGA","JUDIA TIERNA","ESPINACA" 1 "MARGARINA","MANTEQUILLA","ACEITE GIRASOL","ACEITE OLIVA","MANTECA CERDO" 1 "LECHE DESCREM.","LECHE ENTER.","QUESO GRUYERE","QUESO RALLAR","QUESO ROQUEFORT","REQUESON GRASO","YOGUR DESCREM.","YOGUR","CARNE TERNERA","CARNE CORDERO","CERDO MAGRO" 1 "JAMON SERRANO","JAMON YORK","HIGADO","CHORIZO","SALCHICHON","SAL. FRANCFURT","POLLO","PESCADO BLANCO","PESCADO AZUL","MARISCO","HUEVOS" 1 "INTRODUCE FECHA "; 1 "INRODUCE CONCEPTO "; 1 "HARINA TRIGO","PAN I. DE TRIGO","PAN BLANCO","SEMOLA TRIGO","MAIZ (GRANO)","PAN DE CENTENO","COPOS DE AVENA","ARROZ BLANCO","PASTA DE SOPA","SPAGHETTI","PASAS" 1 "ESPARRAGO","COLIFLOR","CEBOLLA","CALABACIN","ALCACHOFA","AJO","ACELGA","UVA","SANDIA","PERA" 1 "DIGITE EL NUMERO DEL ALIMENTO A CONSUMIR O '0' PARA SEGUIR : ";al 1 "DIGITE EL NUMERO DEL ALIMENTO A ANALIZAR O '0' PARA SEGUIR : ";W 1 "CUANTAS CALORIAS/DIA VA A TOMAR?";ca 1 "CUAL ES SU PESO ? ";pe 1 "CUAL ES SU EDAD ? ";ed 1 "COMIDA ","JUEGOS ","PAPEL.Y ESTANCO ","FARMACIA ","COCHE ","CAPRICHOS ","OTROS VARIOS ","INGRESOS" 1 "CATEGORIA "; 1 "CANTIDAD ";A(C): 1 "BROMATOLOG" 1 "ALMENDRA","AVELLANA","CACAHUETE","NUEZ","GARBANZO","GUISANTE","JUDIA (SECA)","LENTEJA","SOJA","TRIGO" 1 "81","84","99","99","93" 1 "78","57","99","90","18.2","8.9","4.6","2.9","6.6","4.9" 1 "76","57","61","76","74","53","67","80","73","75","17.2" 1 "720","743","883","883","830" 1 "547","647","566","664","364","343","337","340","398","326" 1 "54.1","63.2","46.9","67.2","6.2","2","1.6","1.3","16.4","2" 1 "5.6","4.5","3.4","2.9","1.8","4","4.5","4.5","0","0","0" 1 "42","44","52","58","29","62","36","47","97","51" 1 "4.4","6.5","9.7","5.5","5.9","29.3","5.6","16.7","5.3","14.8" 1 "38","61","398","393","378","220","41","71","190","253","216" 1 "364","286","290","362","361","261","387","364","343","369","296" 1 "306","528","384","356","79","41","21","15","36","30" 1 "300","400","130","620","420","250","170","90","200","80","148" 1 "3.6","3.5","27.4","36","21","15","4.6","4.8","19.1","18.2","15.5" 1 "22","33","45","24","29","134","27","68","22","56" 1 "2.7","2.3","1.5","2","3.4","4.7","4.3","3.2","5.7","2.3" 1 "2","2.8","1.4","1","2.7","5.3","1.6","0.6","0.5","0.3" 1 "19.6","19.8","18.1","13.2","61.1","61","60.8","60.7","35.5","72" 1 "18.6","10.8","28.8","13.7","18.2","22.5","22","23.7","33.4","10.2" 1 "16","16","18","14","20","14","18.2","20","20","15","11.3" 1 "14.2","15.1","10.6","64.3","59.8","16.4","10.2","1","15","2","9.8" 1 "10.5","9.4","8.1","10.3","9.4","9.2","13.8","7.2","10.3","12.5","2.1" 1 "10.5","11.1","13.3","15.2","8.1","15.6","8.5","11","25.4","15.2" 1 "1.2","1","1.3","0.4","2.2","1.1","1","0.5","0.2","1.9" 1 "1","1.5","1.8","0.8","4.3","0.7","6.6","0.6","0.4","1.2","1.1" 1 "0.8","0.6","0.8","0.3","0.6","1.2","0.8","0.6","1.2","0.1" 1 "0.6","1","0","0","0" 1 "0.4","0.4","0.9","0.7","0.6","1.6","1.3","0.4","0.4","0.4" 1 "0.4","0","0","0","0" 1 "0.3","5.1","0.5","0","1.8","5.9","3.5","0.6","0.5","0.3","0.5" 1 "0.2","4.4","0","0.4","2.8","0.8","0.8","1.3","2","2.8" 1 "0.2","0.4","0.2","0.2","0.2","0.2","0.4","0.7","0.1","0.2" 1 "0.2","0.3","0.2","0.3","0.6","0.2","0.3","0.2","0.2","0.3" 1 "0.1","3","30.5","26","32","15","0.6","3.8","12","19.4","16.6" 1 "0.1","0.5","0","0.1","2","2.9","1.5","0.7","1.2","0.7" 1 "0","35","0","0.5","0.2","0.4","0.3","0.2","0.2","0.7" 1 "0","0","0","0","0","0","0","0","0","2","2.7" 1 "0","0","0","0","0" 1 "* Un deficit calorico de 1000 calorias diarias (que supone consumir unas 1500 calorias/dia en lugar de las 2500 habituales)es una media razonable , cuyos resultados tal vez no sean es- pectaculares , pero que es muchomas facil mantener durante pe- riodos prolongados y produce re-sultados duraderos." 1 "* Ha de cubrir las necesidades basicas de nutrientes , lo que significa que ha de contener en cantidad suficiente tanto pro- teinas como grasas e hidratos decarbono , ademas de vitaminas y minerales. 1 " ";n+E;" ";a$(n+E): 1 NO EFICAZ 1 MUY GRASO 1 LUIS ANTONIO MENENDEZ PASARIN 1 DESEA VOLVER AL MENU ? (S/N) 1 1982 Sinclair Research Lt 1 ******************** *PROFESOR DIETETICO* ******************** 1 * REQUISITOS BASICOS * 1 * OBSERVACIONES * 1 * FICHA DE PESOS * 1 * RESULTADOS * 1 " 1 " 1